home *** CD-ROM | disk | FTP | other *** search
/ HyperLib 1997 Winter - Disc 1 / HYPERLIB-1997-Winter-CD1.ISO.7z / HYPERLIB-1997-Winter-CD1.ISO / オンラインウェア / COM / Handy Mail 1.0b4 folder.sit / Handy Mail 1.0b4 folder / Handy Mail 1.0b5 Patch / Drag items to "Resources" / FirstClass Gateway Setup / background_2669.xml next >
Extensible Markup Language  |  1996-01-31  |  12KB  |  363 lines

  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
  3. <background>
  4.     <id>2669</id>
  5.     <filler1>0</filler1>
  6.     <bitmap>BMAP_3708.pbm</bitmap>
  7.     <cantDelete> <false /> </cantDelete>
  8.     <showPict> <true /> </showPict>
  9.     <dontSearch> <false /> </dontSearch>
  10.     <link rel="stylesheet" type="text/css" href="stylesheet_3121.css" />
  11.     <part>
  12.         <id>7</id>
  13.         <type>button</type>
  14.         <visible> <true /> </visible>
  15.         <reserved5> 0 </reserved5>
  16.         <reserved4> 0 </reserved4>
  17.         <reserved3> 0 </reserved3>
  18.         <reserved2> 0 </reserved2>
  19.         <reserved1> 0 </reserved1>
  20.         <enabled> <true /> </enabled>
  21.         <rect>
  22.             <left>162</left>
  23.             <top>223</top>
  24.             <right>247</right>
  25.             <bottom>251</bottom>
  26.         </rect>
  27.         <style>default</style>
  28.         <showName> <true /> </showName>
  29.         <highlight> <false /> </highlight>
  30.         <autoHighlight> <true /> </autoHighlight>
  31.         <sharedHighlight> <true /> </sharedHighlight>
  32.         <family>0</family>
  33.         <titleWidth>0</titleWidth>
  34.         <icon>0</icon>
  35.         <textAlign>center</textAlign>
  36.         <font>Chicago</font>
  37.         <textSize>12</textSize>
  38.         <textStyle>plain</textStyle>
  39.         <name>Done</name>
  40.         <script>on mouseUpclose window (short name of this stack)end mouseUpon saveItglobal gDataPathsavePref gDataPath & "FirstClass.pref","FCGateName,FCAdminName,FCSpcRpcChar,stuffitPath","Keeps decoder open,enable private mail"if freeSize of this stack > 5000 then doMenu "compact stack"end saveIt</script>
  41.     </part>
  42.     <part>
  43.         <id>25</id>
  44.         <type>button</type>
  45.         <visible> <false /> </visible>
  46.         <reserved5> 0 </reserved5>
  47.         <reserved4> 0 </reserved4>
  48.         <reserved3> 0 </reserved3>
  49.         <reserved2> 0 </reserved2>
  50.         <reserved1> 0 </reserved1>
  51.         <enabled> <true /> </enabled>
  52.         <rect>
  53.             <left>80</left>
  54.             <top>227</top>
  55.             <right>155</right>
  56.             <bottom>247</bottom>
  57.         </rect>
  58.         <style>standard</style>
  59.         <showName> <true /> </showName>
  60.         <highlight> <false /> </highlight>
  61.         <autoHighlight> <true /> </autoHighlight>
  62.         <sharedHighlight> <true /> </sharedHighlight>
  63.         <family>0</family>
  64.         <titleWidth>0</titleWidth>
  65.         <icon>0</icon>
  66.         <textAlign>center</textAlign>
  67.         <font>Chicago</font>
  68.         <textSize>12</textSize>
  69.         <textStyle>plain</textStyle>
  70.         <name>Cancel</name>
  71.         <script>on mouseUp-- this is odd, but just to restore the original value-- openStackclose window (short name of this stack)end mouseUp</script>
  72.     </part>
  73.     <part>
  74.         <id>34</id>
  75.         <type>field</type>
  76.         <visible> <true /> </visible>
  77.         <dontWrap> <true /> </dontWrap>
  78.         <dontSearch> <false /> </dontSearch>
  79.         <sharedText> <false /> </sharedText>
  80.         <fixedLineHeight> <false /> </fixedLineHeight>
  81.         <autoTab> <false /> </autoTab>
  82.         <lockText> <false /> </lockText>
  83.         <rect>
  84.             <left>12</left>
  85.             <top>26</top>
  86.             <right>249</right>
  87.             <bottom>41</bottom>
  88.         </rect>
  89.         <style>rectangle</style>
  90.         <autoSelect> <false /> </autoSelect>
  91.         <showLines> <false /> </showLines>
  92.         <wideMargins> <false /> </wideMargins>
  93.         <multipleLines> <false /> </multipleLines>
  94.         <reservedFamily> 0 </reservedFamily>
  95.         <selectedLines>
  96.             <integer>1</integer>
  97.         </selectedLines>
  98.         <textAlign>left</textAlign>
  99.         <font>Geneva</font>
  100.         <textSize>9</textSize>
  101.         <textStyle>plain</textStyle>
  102.         <textHeight>12</textHeight>
  103.         <name>FCGateName</name>
  104.         <script></script>
  105.     </part>
  106.     <part>
  107.         <id>38</id>
  108.         <type>button</type>
  109.         <visible> <true /> </visible>
  110.         <reserved5> 0 </reserved5>
  111.         <reserved4> 0 </reserved4>
  112.         <reserved3> 0 </reserved3>
  113.         <reserved2> 0 </reserved2>
  114.         <reserved1> 0 </reserved1>
  115.         <enabled> <true /> </enabled>
  116.         <rect>
  117.             <left>232</left>
  118.             <top>2</top>
  119.             <right>247</right>
  120.             <bottom>17</bottom>
  121.         </rect>
  122.         <style>transparent</style>
  123.         <showName> <false /> </showName>
  124.         <highlight> <false /> </highlight>
  125.         <autoHighlight> <true /> </autoHighlight>
  126.         <sharedHighlight> <true /> </sharedHighlight>
  127.         <family>0</family>
  128.         <titleWidth>0</titleWidth>
  129.         <icon>22604</icon>
  130.         <textAlign>center</textAlign>
  131.         <font>Geneva</font>
  132.         <textSize>9</textSize>
  133.         <textStyle>plain</textStyle>
  134.         <name>?</name>
  135.         <script>on mouseUpcallHelp "FirstClass Gateway Setup"end mouseUp</script>
  136.     </part>
  137.     <part>
  138.         <id>39</id>
  139.         <type>field</type>
  140.         <visible> <true /> </visible>
  141.         <dontWrap> <true /> </dontWrap>
  142.         <dontSearch> <false /> </dontSearch>
  143.         <sharedText> <false /> </sharedText>
  144.         <fixedLineHeight> <false /> </fixedLineHeight>
  145.         <autoTab> <false /> </autoTab>
  146.         <lockText> <false /> </lockText>
  147.         <rect>
  148.             <left>12</left>
  149.             <top>64</top>
  150.             <right>249</right>
  151.             <bottom>79</bottom>
  152.         </rect>
  153.         <style>rectangle</style>
  154.         <autoSelect> <false /> </autoSelect>
  155.         <showLines> <false /> </showLines>
  156.         <wideMargins> <false /> </wideMargins>
  157.         <multipleLines> <false /> </multipleLines>
  158.         <reservedFamily> 0 </reservedFamily>
  159.         <selectedLines>
  160.             <integer>1</integer>
  161.         </selectedLines>
  162.         <textAlign>left</textAlign>
  163.         <font>Geneva</font>
  164.         <textSize>9</textSize>
  165.         <textStyle>plain</textStyle>
  166.         <textHeight>12</textHeight>
  167.         <name>FCAdminName</name>
  168.         <script></script>
  169.     </part>
  170.     <part>
  171.         <id>40</id>
  172.         <type>field</type>
  173.         <visible> <true /> </visible>
  174.         <dontWrap> <true /> </dontWrap>
  175.         <dontSearch> <false /> </dontSearch>
  176.         <sharedText> <false /> </sharedText>
  177.         <fixedLineHeight> <false /> </fixedLineHeight>
  178.         <autoTab> <false /> </autoTab>
  179.         <lockText> <false /> </lockText>
  180.         <rect>
  181.             <left>210</left>
  182.             <top>96</top>
  183.             <right>249</right>
  184.             <bottom>111</bottom>
  185.         </rect>
  186.         <style>rectangle</style>
  187.         <autoSelect> <false /> </autoSelect>
  188.         <showLines> <false /> </showLines>
  189.         <wideMargins> <false /> </wideMargins>
  190.         <multipleLines> <false /> </multipleLines>
  191.         <reservedFamily> 0 </reservedFamily>
  192.         <selectedLines>
  193.             <integer>1</integer>
  194.         </selectedLines>
  195.         <textAlign>left</textAlign>
  196.         <font>Geneva</font>
  197.         <textSize>9</textSize>
  198.         <textStyle>plain</textStyle>
  199.         <textHeight>12</textHeight>
  200.         <name>FCSpcRpcChar</name>
  201.         <script>on exitFieldcheckItend exitFieldon closeFieldcheckItend closeFieldon checkItput me into tif t = "" then put "_" into meput char 1 of t into tif t is in " @abcdefghijklnmopqrstuvwxyz1234567890.%*/^" thenbeepanswer "This is not a legal character to use: '" & t & "'."put "_" into tend ifput t into meend checkIt</script>
  202.     </part>
  203.     <part>
  204.         <id>42</id>
  205.         <type>button</type>
  206.         <visible> <true /> </visible>
  207.         <reserved5> 0 </reserved5>
  208.         <reserved4> 0 </reserved4>
  209.         <reserved3> 0 </reserved3>
  210.         <reserved2> 0 </reserved2>
  211.         <reserved1> 0 </reserved1>
  212.         <enabled> <true /> </enabled>
  213.         <rect>
  214.             <left>11</left>
  215.             <top>188</top>
  216.             <right>236</right>
  217.             <bottom>200</bottom>
  218.         </rect>
  219.         <style>checkbox</style>
  220.         <showName> <true /> </showName>
  221.         <highlight> <false /> </highlight>
  222.         <autoHighlight> <false /> </autoHighlight>
  223.         <sharedHighlight> <true /> </sharedHighlight>
  224.         <family>0</family>
  225.         <titleWidth>0</titleWidth>
  226.         <icon>0</icon>
  227.         <textAlign>center</textAlign>
  228.         <font>Geneva</font>
  229.         <textSize>9</textSize>
  230.         <textStyle>plain</textStyle>
  231.         <name>Converts FC Attachments to BinHex</name>
  232.         <script>on mouseUpanswer "Only available for commercial registered user."end mouseUp</script>
  233.     </part>
  234.     <part>
  235.         <id>43</id>
  236.         <type>field</type>
  237.         <visible> <true /> </visible>
  238.         <dontWrap> <true /> </dontWrap>
  239.         <dontSearch> <false /> </dontSearch>
  240.         <sharedText> <false /> </sharedText>
  241.         <fixedLineHeight> <false /> </fixedLineHeight>
  242.         <autoTab> <false /> </autoTab>
  243.         <lockText> <true /> </lockText>
  244.         <rect>
  245.             <left>90</left>
  246.             <top>119</top>
  247.             <right>251</right>
  248.             <bottom>137</bottom>
  249.         </rect>
  250.         <style>shadow</style>
  251.         <autoSelect> <false /> </autoSelect>
  252.         <showLines> <false /> </showLines>
  253.         <wideMargins> <false /> </wideMargins>
  254.         <multipleLines> <false /> </multipleLines>
  255.         <reservedFamily> 0 </reservedFamily>
  256.         <titleWidth>0</titleWidth>
  257.         <icon>0</icon>
  258.         <textAlign>left</textAlign>
  259.         <font>Geneva</font>
  260.         <textSize>9</textSize>
  261.         <textStyle>plain</textStyle>
  262.         <textHeight>12</textHeight>
  263.         <name>stuffitName</name>
  264.         <script>on mouseUpanswer file "Select StuffIt Expander..." of type "APPL"if it = "" then return ""put it into bg fld "stuffitPath"setDeli ":"put last item of it into bg fld "stuffitName"setDeli "restore"beepanswer "Make sure you have set the Preferences of StuffIt Expander to expand BinHex only." ツャwith "Help" or "OK"if it = "Help" then callHelp "StuffIt Expander Preferences Setup"end mouseUp</script>
  265.     </part>
  266.     <part>
  267.         <id>44</id>
  268.         <type>field</type>
  269.         <visible> <true /> </visible>
  270.         <dontWrap> <true /> </dontWrap>
  271.         <dontSearch> <false /> </dontSearch>
  272.         <sharedText> <false /> </sharedText>
  273.         <fixedLineHeight> <true /> </fixedLineHeight>
  274.         <autoTab> <false /> </autoTab>
  275.         <lockText> <true /> </lockText>
  276.         <rect>
  277.             <left>0</left>
  278.             <top>244</top>
  279.             <right>12</right>
  280.             <bottom>256</bottom>
  281.         </rect>
  282.         <style>transparent</style>
  283.         <autoSelect> <false /> </autoSelect>
  284.         <showLines> <false /> </showLines>
  285.         <wideMargins> <true /> </wideMargins>
  286.         <multipleLines> <false /> </multipleLines>
  287.         <reservedFamily> 0 </reservedFamily>
  288.         <titleWidth>0</titleWidth>
  289.         <icon>0</icon>
  290.         <textAlign>left</textAlign>
  291.         <font>Geneva</font>
  292.         <textSize>9</textSize>
  293.         <textStyle>plain</textStyle>
  294.         <textHeight>30</textHeight>
  295.         <name>stuffitPath</name>
  296.         <script></script>
  297.     </part>
  298.     <part>
  299.         <id>45</id>
  300.         <type>button</type>
  301.         <visible> <true /> </visible>
  302.         <reserved5> 0 </reserved5>
  303.         <reserved4> 0 </reserved4>
  304.         <reserved3> 0 </reserved3>
  305.         <reserved2> 0 </reserved2>
  306.         <reserved1> 0 </reserved1>
  307.         <enabled> <true /> </enabled>
  308.         <rect>
  309.             <left>90</left>
  310.             <top>141</top>
  311.             <right>205</right>
  312.             <bottom>153</bottom>
  313.         </rect>
  314.         <style>checkbox</style>
  315.         <showName> <true /> </showName>
  316.         <highlight> <false /> </highlight>
  317.         <autoHighlight> <true /> </autoHighlight>
  318.         <sharedHighlight> <true /> </sharedHighlight>
  319.         <family>0</family>
  320.         <titleWidth>0</titleWidth>
  321.         <icon>0</icon>
  322.         <textAlign>center</textAlign>
  323.         <font>Geneva</font>
  324.         <textSize>9</textSize>
  325.         <textStyle>plain</textStyle>
  326.         <name>Keeps decoder open</name>
  327.         <script>on mouseUpanswer "This option is under construction."end mouseUp</script>
  328.     </part>
  329.     <part>
  330.         <id>46</id>
  331.         <type>button</type>
  332.         <visible> <true /> </visible>
  333.         <reserved5> 0 </reserved5>
  334.         <reserved4> 0 </reserved4>
  335.         <reserved3> 0 </reserved3>
  336.         <reserved2> 0 </reserved2>
  337.         <reserved1> 0 </reserved1>
  338.         <enabled> <true /> </enabled>
  339.         <rect>
  340.             <left>11</left>
  341.             <top>160</top>
  342.             <right>236</right>
  343.             <bottom>172</bottom>
  344.         </rect>
  345.         <style>checkbox</style>
  346.         <showName> <true /> </showName>
  347.         <highlight> <true /> </highlight>
  348.         <autoHighlight> <true /> </autoHighlight>
  349.         <sharedHighlight> <true /> </sharedHighlight>
  350.         <family>0</family>
  351.         <titleWidth>0</titleWidth>
  352.         <icon>0</icon>
  353.         <textAlign>center</textAlign>
  354.         <font>Geneva</font>
  355.         <textSize>9</textSize>
  356.         <textStyle>plain</textStyle>
  357.         <name>Enable Private Mail</name>
  358.         <script></script>
  359.     </part>
  360.     <name></name>
  361.     <script>on tidy-- global gTELine-- put bg fld id 15 into line gTELine of bg fld id 14put bg fld "subList" into temprepeat with k = 1 to number of lines of tempif line k of temp = "" thendelete line k of tempend ifend repeatput temp into bg fld "subList"end tidyon updateSubList theText,theWordglobal gTELineif theWord = 4 thenput (word 1 to 3 of line gTELine of bg fld "subList") && theText ツャinto line gTELine of bg fld "subList"elseput theText into word theWord of line gTELine of bg fld "subList"end ifend updateSubListfunction omitSpace theTextrepeat--if offset(" ",theText) 竕  0 thenget offset(" ",theText)if it 竕  0 thendelete char offset(" ",theText) of theTextelseexit repeatend ifend repeatreturn theTextend omitSpace</script>
  362. </background>
  363.